Imports Microsoft.VisualBasic

Namespace Tafi.Portal.UI

  Public Class PortalPage
    Inherits System.Web.UI.Page

    Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
      If Session("oUser") Is Nothing Then
        If Request.QueryString("NoControl") Is Nothing Then
          DisplayCommonFunctions.MostrarPaginaMsg(Me.Page, "La sesi&oacute;n a caducado. Por favor vuelva a logearse al sistema.", "")
        End If
      End If
    End Sub

    'Private _FormTittle As String
    'Public Property FormTittle() As String
    '  Get
    '    Return _FormTittle
    '  End Get
    '  Set(ByVal value As String)
    '    _FormTittle = value
    '    Owner.Framework.Web.CommonFunctions.EjecutarScript("setPageTitle('" & value & "');", Me)
    '  End Set
    'End Property

  End Class

End Namespace